home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 93xx / 9311a.d64 / listing 2 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  487b  |  17 lines
  1. 160 REM -- VERSION 2: PERSOENLICHE BESTENLISTE --
  2. 270 OPEN1,8,2,"BESTENLISTE/P,S,R
  3. 500 :
  4. 510 [129]I[178]1[164]15
  5. 520 [139]NA$(I)[178]NA$[167]540
  6. 530 [130]:[137]610
  7. 540 [139]PU(I)[179]PU[167]565
  8. 550 [153]:[153]"LEIDER WAREN SIE SCHON EINMAL BESSER:
  9. 560 PRINT"SIE HATTEN SCHON MAL"PU(I)"PUNKTE.":GOTO310
  10. 565 PRINT:PRINT"DAMIT UEBERTREFFEN SIE IHREN BISHERIGEN
  11. 567 [153]"PERSOENLICHEN REKORD VON"PU(I)"PUNKTEN.
  12. 570 IFI=15THEN590
  13. 580 PU(I)=PU(I+1):NA$(I)=NA$(I+1):I=I+1:GOTO570
  14. 590 PU(I)=0:NA$(I)="(LEER)
  15. 860 [159]15,8,15,"S:BESTENLISTE/P":[160]15
  16. 870 [159]3,8,2,"BESTENLISTE/P,S,W
  17.